#include <iostream>
#include <vector>
#include <algorithm>
#include <cctype>
#include <string>

int main() {
    std::string pop;
    std::getline(std::cin, pop);

    int b = 0;

    if (pop.empty() || std::count(pop.begin(), pop.end(), ' ') == 0) {
        std::cout << "Мало данных для анализа" << std::endl;
    } else {
        std::vector<std::string> popok = {};
        std::string temp = "";
        for (char c : pop) {
            if (c == ' ') {
                popok.push_back(temp);
                temp = "";
            } else {
                temp += c;
            }
        }
        popok.push_back(temp);

        int popopok = popok.size();

        int evrey = 0;
        for (const auto& word : popok) {
            bool has_uppercase = false;
            for (char c : word) {
                if (c >= 'А' && c <= 'Я') {
                    has_uppercase = true;
                    break;
                }
            }
            if (has_uppercase) {
                evrey++;
            }
        }

        int po = 0;
        for (const auto& word : popok) {
            bool has_latin = false;
            for (char c : word) {
                if (std::isalpha(c) && std::tolower(c) != 'а' && std::tolower(c) != 'б' && std::tolower(c) != 'в' && std::tolower(c) != 'г' && std::tolower(c) != 'д' && std::tolower(c) != 'е' && std::tolower(c) != 'ё' && std::tolower(c) != 'ж' && std::tolower(c) != 'з' && std::tolower(c) != 'и' && std::tolower(c) != 'й' && std::tolower(c) != 'к' && std::tolower(c) != 'л' && std::tolower(c) != 'м' && std::tolower(c) != 'н' && std::tolower(c) != 'о' && std::tolower(c) != 'п' && std::tolower(c) != 'р' && std::tolower(c) != 'с' && std::tolower(c) != 'т' && std::tolower(c) != 'у' && std::tolower(c) != 'ф' && std::tolower(c) != 'х' && std::tolower(c) != 'ц' && std::tolower(c) != 'ч' && std::tolower(c) != 'ш' && std::tolower(c) != 'щ' && std::tolower(c) != 'ъ' && std::tolower(c) != 'ы' && std::tolower(c) != 'ь' && std::tolower(c) != 'э' && std::tolower(c) != 'ю' && std::tolower(c) != 'я') {
                    has_latin = true;
                    break;
                }
            }
            if (has_latin) {
                po++;
            }
        }

        int popo = 0;
        for (const auto& word : popok) {
            if (word.length() <= 3) {
                popo++;
            }
        }

        std::vector<std::string> a = {};
        int c = 1;
        int gadodle = 0;
        for (const auto& word : popok) {
            if (word.find('-') != std::string::npos) {
                gadodle++;
            }
        }

        std::string rel = *std::max_element(popok.begin(), popok.end(), [](const std::string& a, const std::string& b) {
            return a.length() < b.length();
        });

        int ned = rel.length();

        int dadool = 9;

        std::string gyperid = "Кол-во слов: " + std::to_string(evrey) + "\n"
                            "Кол-во слов с заглавной кириллической буквы: " + std::to_string(popopok) + "\n"
                            "Кол-во слов содержащих латинский символ: " + std::to_string(po) + "\n"
                            "Кол-во слов не превышающих 3 символа: " + std::to_string(popo) + "\n"
                            "Кол-во слов в составе которых имеется дефис: " + std::to_string(gadodle) + "\n\n"
                            "Самое длинное слово: " + rel + "\n"
                            "Длина слова: " + std::to_string(ned);

        std::cout << gyperid << std::endl;

        return 0;
    }
}
